home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Deutsche Edition 1
/
Deutsche Edition 1.iso
/
amok
/
081-090
/
amok84
/
envsupport
/
envsupport.dok
next >
Wrap
Text File
|
1993-11-04
|
2KB
|
68 lines
/
EnvSupport /
______________/
Dieses Modul vereinfacht die Handhabung von Environmentvariablen in einem
OberonProgramm.
Es stehen folgende Prozeduren zur Verfügung:
PROCEDURE Local (local: BOOLEAN);
PROCEDURE SetFlags (newFlags: LONGSET);
PROCEDURE SetEnv (Name, String: ARRAY OF CHAR): BOOLEAN;
PROCEDURE GetEnv (Name: ARRAY OF CHAR; VAR Buff: ARRAY OF CHAR): BOOLEAN;
PROCEDURE AddEnv (Name, String: ARRAY OF CHAR): BOOLEAN;
PROCEDURE CutEnv (Name, String: ARRAY OF CHAR): BOOLEAN;
PROCEDURE TestEnv (Name, String: ARRAY OF CHAR): BOOLEAN;
PROCEDURE ToggleEnv (Name, String: ARRAY OF CHAR): BOOLEAN;
Jetzt folgt die Beschreibung der einzelnen Prozeduren:
PROCEDURE Local(local: BOOLEAN);
-- Sollen die Variablen lokal (nur für dein Programm) oder global sein?
PROCEDURE SetFlags(newFlags: LONGSET);
-- Falls jemand noch andere flags (binaryVar) setzen will.
PROCEDURE SetEnv(Name, String: ARRAY OF CHAR): BOOLEAN;
-- Die EnvVar 'Name' mit 'String' belegen.
PROCEDURE GetEnv(Name: ARRAY OF CHAR; VAR Buff: ARRAY OF CHAR): BOOLEAN;
-- Den Wert der EnvVar 'Name' holen.
PROCEDURE AddEnv(Name, String: ARRAY OF CHAR): BOOLEAN;
-- 'String' an den Inhalt der EnvVar 'Name' anhängen.
PROCEDURE CutEnv(Name, String: ARRAY OF CHAR): BOOLEAN;
-- 'String' aus der EnvVar 'Name' löschen.
PROCEDURE TestEnv(Name, String: ARRAY OF CHAR): BOOLEAN;
-- Testen, ob 'String' in 'Name' vorkommt.
PROCEDURE ToggleEnv(Name, String: ARRAY OF CHAR): BOOLEAN;
-- Wenn 'String' in 'Name' vorkommt, 'String' aus 'Name' löschen,
sonst 'String' anhängen.
So, das wars! Viel Spaß damit!